Best of www.BestZips.com (Collector's Edition)/Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO/internet/32psio11.zip/_SETUP.1/INET32.EXE/0/RCDATA/TFORM2/TFORM2.txt

Text File | 1997-01-17 | 78KB | 2,597 lines

object Form2: TForm2
  Left = 23
  Top = 67
  Hint = 'Use Right Mouse Button To Display Popup Menus'
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'PrimaSoft Internet Organizer'
  ClientHeight = 444
  ClientWidth = 585
  Color = clBlue
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu1
  PixelsPerInch = 96
  ShowHint = True
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  TextHeight = 16
  object Panel4: TPanel
    Left = 9
    Top = 391
    Width = 567
    Height = 34
    BevelInner = bvLowered
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    Visible = False
  end
  object Panel5: TPanel
    Left = 280
    Top = 0
    Width = 24
    Height = 390
    Caption = 'Panel5'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    object A_Btn: TColorButton
      Left = 0
      Top = 0
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with A'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'A'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 0
      OnClick = A_BtnClick
    end
    object B_Btn: TColorButton
      Left = 0
      Top = 15
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with B'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'B'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 1
      OnClick = A_BtnClick
    end
    object C_Btn: TColorButton
      Left = 0
      Top = 30
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with C'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'C'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 2
      OnClick = A_BtnClick
    end
    object D_Btn: TColorButton
      Left = 0
      Top = 45
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with D'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'D'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 3
      OnClick = A_BtnClick
    end
    object E_Btn: TColorButton
      Left = 0
      Top = 60
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with E'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'E'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 4
      OnClick = A_BtnClick
    end
    object F_Btn: TColorButton
      Left = 0
      Top = 75
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with F'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'F'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 5
      OnClick = A_BtnClick
    end
    object G_Btn: TColorButton
      Left = 0
      Top = 90
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with G'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'G'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 6
      OnClick = A_BtnClick
    end
    object H_Btn: TColorButton
      Left = 0
      Top = 105
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with H'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'H'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 7
      OnClick = A_BtnClick
    end
    object I_Btn: TColorButton
      Left = 0
      Top = 120
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with I'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'I'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 8
      OnClick = A_BtnClick
    end
    object J_Btn: TColorButton
      Left = 0
      Top = 135
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with J'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'J'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 9
      OnClick = A_BtnClick
    end
    object K_Btn: TColorButton
      Left = 0
      Top = 150
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with K'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'K'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 10
      OnClick = A_BtnClick
    end
    object L_Btn: TColorButton
      Left = 0
      Top = 165
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with L'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'L'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 11
      OnClick = A_BtnClick
    end
    object M_Btn: TColorButton
      Left = 0
      Top = 180
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with M'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'M'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 12
      OnClick = A_BtnClick
    end
    object N_Btn: TColorButton
      Left = 0
      Top = 195
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with N'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'N'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 13
      OnClick = A_BtnClick
    end
    object O_Btn: TColorButton
      Left = 0
      Top = 210
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with O'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'O'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 14
      OnClick = A_BtnClick
    end
    object P_Btn: TColorButton
      Left = 0
      Top = 225
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with P'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'P'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 15
      OnClick = A_BtnClick
    end
    object Q_Btn: TColorButton
      Left = 0
      Top = 240
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with Q'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'Q'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 16
      OnClick = A_BtnClick
    end
    object R_Btn: TColorButton
      Left = 0
      Top = 255
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with R'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'R'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 17
      OnClick = A_BtnClick
    end
    object S_Btn: TColorButton
      Left = 0
      Top = 270
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with S'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'S'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 18
      OnClick = A_BtnClick
    end
    object T_Btn: TColorButton
      Left = 0
      Top = 285
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with T'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'T'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 19
      OnClick = A_BtnClick
    end
    object U_Btn: TColorButton
      Left = 0
      Top = 300
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with U'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'U'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 20
      OnClick = A_BtnClick
    end
    object V_Btn: TColorButton
      Left = 0
      Top = 315
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with V'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'V'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 21
      OnClick = A_BtnClick
    end
    object W_Btn: TColorButton
      Left = 0
      Top = 330
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with W'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'W'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 22
      OnClick = A_BtnClick
    end
    object X_Btn: TColorButton
      Left = 0
      Top = 345
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with X'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'X'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 23
      OnClick = A_BtnClick
    end
    object Y_Btn: TColorButton
      Left = 0
      Top = 360
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with Y'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'Y'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 24
      OnClick = A_BtnClick
    end
    object Z_Btn: TColorButton
      Left = 0
      Top = 375
      Width = 24
      Height = 15
      Hint = 'Jump to Page beginning with Z'
      BgndColor = clBtnFace
      SelBgndColor = clSilver
      Caption = 'Z'
      ParentShowHint = False
      ShowHint = True
      StayDown = True
      TabOrder = 25
      OnClick = A_BtnClick
    end
  end
  object PgLeft: TPanel
    Left = 8
    Top = 0
    Width = 272
    Height = 390
    BevelOuter = bvNone
    Color = clSilver
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 0
    object Notebook1: TNotebook
      Left = 0
      Top = 14
      Width = 272
      Height = 326
      Align = alClient
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 1'
        object PgL1: TPanel
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Ctl3D = True
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          object Label_L0: TLabel
            Tag = 1
            Left = 8
            Top = 3
            Width = 26
            Height = 16
            Caption = 'Title:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L1: TLabel
            Tag = 2
            Left = 3
            Top = 54
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Address:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L2: TLabel
            Tag = 3
            Left = 3
            Top = 83
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Category 1:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L3: TLabel
            Tag = 4
            Left = 3
            Top = 113
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Category 2:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L4: TLabel
            Tag = 5
            Left = 3
            Top = 144
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Keywords:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L8: TLabel
            Tag = 9
            Left = 9
            Top = 281
            Width = 39
            Height = 15
            Caption = 'Phone:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L5: TLabel
            Tag = 6
            Left = 3
            Top = 173
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'EMail:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L6: TLabel
            Tag = 7
            Left = 7
            Top = 196
            Width = 29
            Height = 15
            Caption = 'Type:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L7: TLabel
            Tag = 8
            Left = 7
            Top = 240
            Width = 29
            Height = 15
            Caption = 'Date:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L9: TLabel
            Tag = 10
            Left = 137
            Top = 197
            Width = 31
            Height = 15
            Caption = 'Logo:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L2: TLookup
            Tag = 3
            Left = 80
            Top = 80
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 2
            AskUser = False
            Source = 'list1.dbf'
            Twin = R2
          end
          object L3: TLookup
            Tag = 4
            Left = 80
            Top = 110
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 3
            AskUser = False
            Source = 'list2.dbf'
            Twin = R3
          end
          object L8: TPhoneEdit
            Tag = 9
            Left = 8
            Top = 295
            Width = 122
            Height = 24
            Hint = 'Enter Phone # Here - Digits and Letters Valid'
            AutoSelect = False
            AutoSize = False
            TabOrder = 8
          end
          object L4: TEdit
            Tag = 5
            Left = 80
            Top = 140
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 4
          end
          object L5: TEdit
            Tag = 6
            Left = 80
            Top = 171
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 5
          end
          object L6: TLookup
            Tag = 7
            Left = 8
            Top = 212
            Width = 122
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 6
            AskUser = False
            Source = 'list3.dbf'
            Twin = R6
          end
          object L7: TDateEdit
            Tag = 8
            Left = 8
            Top = 254
            Width = 122
            Height = 24
            Hint = 'Enter Date Here'
            DateFormat = 'mm/dd/yyyy'
            Date = '__/__/____'
            MaxLength = 10
            TabOrder = 7
          end
          object L9: TBmpControl
            Tag = 10
            Left = 136
            Top = 211
            Width = 129
            Height = 111
            Hint = 'Graphical Field - Right Mouse Click displays Menu'
            Caption = 'L9'
            TabOrder = 9
            ShowButtons = False
            AutoZoom = True
            Enlarge = False
          end
          object L0: TClickEdit
            Tag = 1
            Left = 8
            Top = 20
            Width = 257
            Height = 24
            Hint = 'Enter Text Here'
            ButtonHint = 'Click To Capture Web Page Title'
            BtnClick = L0BtnClick
            AutoSelect = False
            TabOrder = 0
          end
          object L1: TClickEdit
            Tag = 2
            Left = 80
            Top = 49
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            ButtonHint = 'Click To Capture Web Page Address'
            BtnClick = L1BtnClick
            AutoSelect = False
            TabOrder = 1
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 2'
        object PgL2: TPanel
          Tag = 1
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object Label_L14: TLabel
            Tag = 15
            Left = 10
            Top = 120
            Width = 66
            Height = 15
            Caption = 'Description:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L10: TLabel
            Tag = 11
            Left = 3
            Top = 11
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 1:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L11: TLabel
            Tag = 12
            Left = 3
            Top = 41
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 2:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L12: TLabel
            Tag = 13
            Left = 3
            Top = 71
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 3:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_L13: TLabel
            Tag = 14
            Left = 3
            Top = 101
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 4:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L14: TMemo
            Tag = 15
            Left = 8
            Top = 136
            Width = 257
            Height = 185
            Hint = 'Multi-line Text Field'
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
            ScrollBars = ssVertical
            TabOrder = 0
          end
          object L10: TEdit
            Tag = 11
            Left = 80
            Top = 8
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 1
          end
          object L11: TEdit
            Tag = 12
            Left = 80
            Top = 38
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 2
          end
          object L12: TLookup
            Tag = 13
            Left = 80
            Top = 67
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 3
            AskUser = False
            Source = 'list4.dbf'
            Twin = R12
          end
          object L13: TLookup
            Tag = 14
            Left = 80
            Top = 97
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 4
            AskUser = False
            Source = 'list5.dbf'
            Twin = R13
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 3'
        object PgL3: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label_L15: TLabel
            Tag = 16
            Left = 6
            Top = 2
            Width = 36
            Height = 15
            Caption = 'Notes:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L15: TMemo
            Tag = 16
            Left = 7
            Top = 16
            Width = 257
            Height = 305
            Hint = 'Multi-line Text Field'
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
            ScrollBars = ssVertical
            TabOrder = 0
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 4'
        object PgL4: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label_L16: TLabel
            Tag = 17
            Left = 6
            Top = 2
            Width = 41
            Height = 15
            Caption = 'Picture:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L16: TBmpControl
            Tag = 17
            Left = 8
            Top = 16
            Width = 257
            Height = 305
            Hint = 'Graphical Field - Right Mouse Click displays Menu'
            TabOrder = 0
            ShowButtons = True
          end
        end
      end
    end
    object Panel1: TPanel
      Left = 0
      Top = 340
      Width = 272
      Height = 30
      Align = alBottom
      BevelInner = bvLowered
      ParentColor = True
      TabOrder = 1
      object PgL_Lbl: TLabel
        Tag = -1
        Left = 2
        Top = 11
        Width = 38
        Height = 14
        AutoSize = False
        Caption = '999999'
        Color = clYellow
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object B_First: TBitBtn
        Left = 41
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo First Page [Ctrl+Home]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = B_FirstClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
      object B_PgUp: TBitBtn
        Left = 64
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo Previous Page [Ctrl+PgUp]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = B_PgUpClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
      object B_LUndo: TBitBtn
        Left = 197
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Undo Changes To Left Record [Ctrl+U]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        TabStop = False
        OnClick = L_UndoClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        NumGlyphs = 2
      end
      object B_LPaste: TBitBtn
        Left = 151
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Paste From Copy Buffer To Left Record [Ctrl+P]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
        OnClick = B_LPasteClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
          FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
          FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
          FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
          0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
          9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
          9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
          99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
          93337777FF777777733370000000073333333777777773333333}
        NumGlyphs = 2
      end
      object B_LCopy: TBitBtn
        Left = 174
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Copy Left Record To Copy Buffer [Ctrl+O]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        TabStop = False
        OnClick = B_LCopyClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
          007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
          7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
          99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
          99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
          99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
          93337FFFF7737777733300000033333333337777773333333333}
        NumGlyphs = 2
      end
      object B_LDelete: TBitBtn
        Left = 220
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Delete Left Record [Ctrl+Delete]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
        TabStop = False
        OnClick = B_LDeleteClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
          3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
          03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
          33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
          0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
          3333333337FFF7F33333333330000033333333333777773333330000}
        NumGlyphs = 2
      end
      object B_LPrint: TBitBtn
        Left = 243
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Print Left Record [Ctrl+R]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 8
        TabStop = False
        OnClick = B_LPrintClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
          0003377777777777777308888888888888807F33333333333337088888888888
          88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
          8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
          8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
          03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
          03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
          33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
          33333337FFFF77333333333000000333333333377777733333330000}
        NumGlyphs = 2
      end
      object B_LCapture: TBitBtn
        Left = 120
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Capture Web Page Into New Record [Ctrl+W]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
        OnClick = B_LCaptureClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
          FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
          00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
          F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
          00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
          F033777777777337F73309999990FFF0033377777777FFF77333099999000000
          3333777777777777333333399033333333333337773333333333333903333333
          3333333773333333333333303333333333333337333333333333}
        NumGlyphs = 2
      end
      object B_LGo: TBitBtn
        Left = 97
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Go To Web Page [Ctrl+G]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        TabStop = False
        OnClick = B_LGoClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555FFFFF555555555544C4C5555555555F777775FF5555554C444C444
          5555555775FF55775F55554C4334444445555575577F55557FF554C4C334C4C4
          335557F5577FF55577F554CCC3334444335557555777F555775FCCCCC333CCC4
          C4457F55F777F555557F4CC33333CCC444C57F577777F5F5557FC4333333C3C4
          CCC57F777777F7FF557F4CC33333333C4C457F577777777F557FCCC33CC4333C
          C4C575F7755F777FF5755CCCCC3333334C5557F5FF777777F7F554C333333333
          CC55575777777777F755553333CC3C33C555557777557577755555533CC4C4CC
          5555555775FFFF77555555555C4CCC55555555555777775555550000}
        NumGlyphs = 2
      end
    end
    object TabSet2: TTabSet
      Left = 0
      Top = 370
      Width = 272
      Height = 20
      Hint = 'Select Part of the Record [Ctrl+#]'
      Align = alBottom
      BackgroundColor = clSilver
      DitherBackground = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Tabs.Strings = (
        'Part 1'
        'Part 2'
        'Part 3'
        'Part 4')
      TabIndex = 0
      OnClick = TabSet2Click
    end
    object LStatus: TPanel
      Left = 0
      Top = 0
      Width = 272
      Height = 14
      Align = alTop
      BevelInner = bvLowered
      Caption = 'Read/Write Access'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      TabOrder = 3
    end
  end
  object PgRight: TPanel
    Left = 304
    Top = 0
    Width = 272
    Height = 390
    BevelOuter = bvNone
    Color = clSilver
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu2
    TabOrder = 1
    object Notebook2: TNotebook
      Left = 0
      Top = 14
      Width = 272
      Height = 326
      Align = alClient
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 1'
        object PgR1: TPanel
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Ctl3D = True
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          object Label_R0: TLabel
            Tag = 1
            Left = 8
            Top = 3
            Width = 26
            Height = 16
            Caption = 'Title:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R1: TLabel
            Tag = 2
            Left = 3
            Top = 54
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Address:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R2: TLabel
            Tag = 3
            Left = 3
            Top = 83
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Category 1:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R3: TLabel
            Tag = 4
            Left = 3
            Top = 113
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Category 2:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R4: TLabel
            Tag = 5
            Left = 3
            Top = 144
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'Keywords:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R5: TLabel
            Tag = 6
            Left = 3
            Top = 173
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'EMail:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R6: TLabel
            Tag = 7
            Left = 7
            Top = 196
            Width = 29
            Height = 15
            Caption = 'Type:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R7: TLabel
            Tag = 8
            Left = 7
            Top = 240
            Width = 29
            Height = 15
            Caption = 'Date:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R8: TLabel
            Tag = 9
            Left = 9
            Top = 281
            Width = 39
            Height = 15
            Caption = 'Phone:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R9: TLabel
            Tag = 10
            Left = 137
            Top = 197
            Width = 31
            Height = 15
            Caption = 'Logo:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object R2: TLookup
            Tag = 3
            Left = 80
            Top = 80
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 2
            AskUser = False
            Source = 'list1.dbf'
            Twin = L2
          end
          object R3: TLookup
            Tag = 4
            Left = 80
            Top = 110
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 3
            AskUser = False
            Source = 'list2.dbf'
            Twin = L3
          end
          object R4: TEdit
            Tag = 5
            Left = 80
            Top = 140
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 4
          end
          object R5: TEdit
            Tag = 6
            Left = 80
            Top = 171
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 5
          end
          object R6: TLookup
            Tag = 7
            Left = 8
            Top = 212
            Width = 122
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 6
            AskUser = False
            Source = 'list3.dbf'
            Twin = L6
          end
          object R7: TDateEdit
            Tag = 8
            Left = 8
            Top = 254
            Width = 122
            Height = 24
            Hint = 'Enter Date Here'
            DateFormat = 'mm/dd/yyyy'
            Date = '__/__/____'
            MaxLength = 10
            TabOrder = 7
          end
          object R8: TPhoneEdit
            Tag = 9
            Left = 8
            Top = 295
            Width = 122
            Height = 24
            Hint = 'Enter Phone # Here - Digits and Letters Valid'
            AutoSelect = False
            AutoSize = False
            TabOrder = 8
          end
          object R9: TBmpControl
            Tag = 10
            Left = 136
            Top = 211
            Width = 129
            Height = 111
            Hint = 'Graphical Field - Right Mouse Click displays Menu'
            Caption = 'L9'
            TabOrder = 9
            ShowButtons = False
            AutoZoom = True
            Enlarge = False
          end
          object R0: TClickEdit
            Tag = 1
            Left = 8
            Top = 20
            Width = 257
            Height = 24
            Hint = 'Enter Text Here'
            ButtonHint = 'Click To Capture Web Page Title'
            BtnClick = R0BtnClick
            AutoSelect = False
            TabOrder = 0
          end
          object R1: TClickEdit
            Tag = 2
            Left = 80
            Top = 49
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            ButtonHint = 'Click To Capture Web Page Address'
            BtnClick = R1BtnClick
            AutoSelect = False
            TabOrder = 1
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 2'
        object PgR2: TPanel
          Tag = 1
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object Label_R10: TLabel
            Tag = 11
            Left = 3
            Top = 11
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 1:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R11: TLabel
            Tag = 12
            Left = 3
            Top = 41
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 2:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R12: TLabel
            Tag = 13
            Left = 3
            Top = 71
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 3:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R13: TLabel
            Tag = 14
            Left = 3
            Top = 101
            Width = 72
            Height = 15
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'User Field 4:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label_R14: TLabel
            Tag = 15
            Left = 10
            Top = 120
            Width = 66
            Height = 15
            Caption = 'Description:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object R10: TEdit
            Tag = 11
            Left = 80
            Top = 8
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 0
          end
          object R11: TEdit
            Tag = 12
            Left = 80
            Top = 38
            Width = 185
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 1
          end
          object R12: TLookup
            Tag = 13
            Left = 80
            Top = 67
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 2
            AskUser = False
            Source = 'list4.dbf'
            Twin = L12
          end
          object R13: TLookup
            Tag = 14
            Left = 80
            Top = 97
            Width = 185
            Height = 24
            Hint = 'Click On The Down Arrow To See The Choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 3
            AskUser = False
            Source = 'list5.dbf'
            Twin = L13
          end
          object R14: TMemo
            Tag = 15
            Left = 8
            Top = 136
            Width = 257
            Height = 185
            Hint = 'Multi-line Text Field'
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
            ScrollBars = ssVertical
            TabOrder = 4
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 3'
        object PgR3: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label_R15: TLabel
            Tag = 16
            Left = 6
            Top = 2
            Width = 36
            Height = 15
            Caption = 'Notes:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object R15: TMemo
            Tag = 16
            Left = 7
            Top = 16
            Width = 257
            Height = 305
            Hint = 'Multi-line Text Field'
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            Lines.Strings = (
              '')
            ParentFont = False
            ScrollBars = ssVertical
            TabOrder = 0
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 4'
        object PgR4: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 326
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label_R16: TLabel
            Tag = 17
            Left = 6
            Top = 2
            Width = 41
            Height = 15
            Caption = 'Picture:'
            Font.Color = clBlack
            Font.Height = -12
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object R16: TBmpControl
            Tag = 17
            Left = 8
            Top = 16
            Width = 257
            Height = 305
            Hint = 'Graphical Field - Right Mouse Click displays Menu'
            Caption = 'R16'
            TabOrder = 0
            ShowButtons = True
          end
        end
      end
    end
    object TabSet3: TTabSet
      Left = 0
      Top = 370
      Width = 272
      Height = 20
      Hint = 'Select Part of the Record [Alt+#]'
      Align = alBottom
      BackgroundColor = clSilver
      DitherBackground = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Tabs.Strings = (
        'Part 1'
        'Part 2'
        'Part 3'
        'Part 4')
      TabIndex = 0
      OnClick = TabSet3Click
    end
    object Panel2: TPanel
      Left = 0
      Top = 340
      Width = 272
      Height = 30
      Align = alBottom
      BevelInner = bvLowered
      ParentColor = True
      TabOrder = 2
      object PgR_Lbl: TLabel
        Tag = -1
        Left = 230
        Top = 11
        Width = 38
        Height = 14
        Alignment = taRightJustify
        AutoSize = False
        Caption = '999999'
        Color = clYellow
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object B_RPrint: TBitBtn
        Left = 4
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Print Right Record [Alt+R]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        TabStop = False
        OnClick = B_RPrintClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
          0003377777777777777308888888888888807F33333333333337088888888888
          88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
          8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
          8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
          03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
          03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
          33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
          33333337FFFF77333333333000000333333333377777733333330000}
        NumGlyphs = 2
      end
      object B_RDelete: TBitBtn
        Left = 27
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Delete Right Record [Alt+Delete]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = B_RDeleteClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
          3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
          03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
          33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
          0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
          3333333337FFF7F33333333330000033333333333777773333330000}
        NumGlyphs = 2
      end
      object B_RCopy: TBitBtn
        Left = 73
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Copy Right Record To Copy Buffer [Alt+O]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
        OnClick = B_RCopyClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
          007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
          7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
          99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
          99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
          99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
          93337FFFF7737777733300000033333333337777773333333333}
        NumGlyphs = 2
      end
      object B_RPaste: TBitBtn
        Left = 96
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Paste From Copy Buffer To Right Record [Alt+P]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
        OnClick = B_RPasteClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
          FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
          FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
          FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
          0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
          9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
          9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
          99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
          93337777FF777777733370000000073333333777777773333333}
        NumGlyphs = 2
      end
      object B_RUndo: TBitBtn
        Left = 50
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Undo Changes To Right Record [Alt+U]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        TabStop = False
        OnClick = B_RUndoClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        NumGlyphs = 2
      end
      object B_PgDn: TBitBtn
        Left = 182
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo Next Page [Ctrl+PgDn]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
        OnClick = B_PgDnClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object B_Last: TBitBtn
        Left = 205
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo Last Page [Ctrl+End]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 8
        OnClick = B_LastClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object B_RGo: TBitBtn
        Left = 150
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Go To Web Page [Alt+G]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        TabStop = False
        OnClick = B_RGoClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555FFFFF555555555544C4C5555555555F777775FF5555554C444C444
          5555555775FF55775F55554C4334444445555575577F55557FF554C4C334C4C4
          335557F5577FF55577F554CCC3334444335557555777F555775FCCCCC333CCC4
          C4457F55F777F555557F4CC33333CCC444C57F577777F5F5557FC4333333C3C4
          CCC57F777777F7FF557F4CC33333333C4C457F577777777F557FCCC33CC4333C
          C4C575F7755F777FF5755CCCCC3333334C5557F5FF777777F7F554C333333333
          CC55575777777777F755553333CC3C33C555557777557577755555533CC4C4CC
          5555555775FFFF77555555555C4CCC55555555555777775555550000}
        NumGlyphs = 2
      end
      object B_RCapture: TBitBtn
        Left = 127
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Capture Web Page Into New Record [Alt+W]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        TabStop = False
        OnClick = B_RCaptureClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
          FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
          00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
          F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
          00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
          F033777777777337F73309999990FFF0033377777777FFF77333099999000000
          3333777777777777333333399033333333333337773333333333333903333333
          3333333773333333333333303333333333333337333333333333}
        NumGlyphs = 2
      end
    end
    object RStatus: TPanel
      Left = 0
      Top = 0
      Width = 272
      Height = 14
      Align = alTop
      BevelInner = bvLowered
      Caption = 'Read/Write Access'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      TabOrder = 3
    end
  end
  object TabSet1: TTabSet
    Left = 8
    Top = 424
    Width = 568
    Height = 20
    Hint = 'Click on Tabs to select Menu Bar'
    BackgroundColor = clBlue
    DitherBackground = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentShowHint = False
    ShowHint = True
    Tabs.Strings = (
      'Standard'
      'Advanced')
    TabIndex = 0
    OnClick = TabSet1Click
  end
  object Panel3: TPanel
    Left = 9
    Top = 391
    Width = 567
    Height = 34
    BevelInner = bvLowered
    Ctl3D = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 2
    object B_Search: TBitBtn
      Left = 5
      Top = 4
      Width = 66
      Height = 26
      Hint = 'Find Text'
      Caption = 'Find'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = B_SearchClick
      Glyph.Data = {
        36010000424D3601000000000000760000002800000012000000100000000100
        040000000000C000000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888078888888
        88888800E111880007888888888888A21EE28000007888888888881181118801
        10078888888888225A2288801100777777888811E111888801100000007888AA
        5AAA88888010078880078811E11188888800788BB87078AA5AAA888888078888
        8BB70800F00088888808888888B80822D22288888807B88888B8080000008888
        8807BBB8888808222222888888007BBB888778AAAAAA8888888077BB88708888
        8888888888880777700888000000888888888000078888000000}
    end
    object B_TOC: TBitBtn
      Left = 431
      Top = 4
      Width = 63
      Height = 26
      Hint = 'Return to Table Of Contents'
      Caption = 'TOC'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = B_TOCClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
        C8807FF7777777777FF700000000000000007777777777777777333333333333
        33333333333333333333333333333333333333333333333333330000}
      NumGlyphs = 2
    end
    object B_New: TBitBtn
      Left = 253
      Top = 4
      Width = 62
      Height = 26
      Hint = 'Add New Record'
      Caption = 'New'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = B_NewClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
    end
    object B_Exit: TBitBtn
      Left = 504
      Top = 4
      Width = 57
      Height = 26
      Hint = 'Program Shutdown'
      Caption = 'Exit'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = B_ExitClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F33330000000000033333777777777773330000}
      NumGlyphs = 2
    end
    object B_Help: TBitBtn
      Left = 336
      Top = 4
      Width = 62
      Height = 26
      Hint = 'Display Help Window'
      Caption = 'Help'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = HelpContents1Click
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
        33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
        FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
        FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
        FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
        FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
        FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
        3333333773FFFF77333333333FBFBF33333333333777773333330000}
      NumGlyphs = 2
    end
  end
  object MainMenu1: TMainMenu
    Left = 499
    Top = 424
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New Record'
        OnClick = B_NewClick
      end
      object PrintRight1: TMenuItem
        Caption = 'Print &Left Record'
        OnClick = B_LPrintClick
      end
      object PrintRightRecord1: TMenuItem
        Caption = 'Print &Right Record'
        OnClick = B_RPrintClick
      end
      object TableOfContents1: TMenuItem
        Caption = '&Table Of Contents'
        OnClick = B_TOCClick
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = B_ExitClick
      end
    end
    object Search1: TMenuItem
      Caption = '&Search'
      object Find1: TMenuItem
        Caption = '&Find'
        OnClick = B_SearchClick
      end
    end
    object LeftPage1: TMenuItem
      Caption = '&Move'
      object First1: TMenuItem
        Caption = '&First'
        OnClick = B_FirstClick
      end
      object PageUp1: TMenuItem
        Caption = 'Page&Up'
        OnClick = B_PgUpClick
      end
      object PageDown1: TMenuItem
        Caption = 'Page&Down'
        OnClick = B_PgDnClick
      end
      object Last1: TMenuItem
        Caption = '&Last'
        OnClick = B_LastClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object HelpContents1: TMenuItem
        Caption = '&Help Contents'
        OnClick = HelpContents1Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 456
    Top = 424
    object LeftRecord1: TMenuItem
      Caption = 'Left Record:'
      Enabled = False
    end
    object GoTo1: TMenuItem
      Caption = '&Go To Web Page'
      OnClick = B_LGoClick
    end
    object Capture1: TMenuItem
      Caption = 'Capture &Web Page'
      OnClick = B_LCaptureClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object ViewBuffer1: TMenuItem
      Caption = '&View Copy Buffer'
      object TMenuItem
      end
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Paste1: TMenuItem
      Caption = '&Paste Record'
      OnClick = B_LPasteClick
    end
    object Copy1: TMenuItem
      Caption = 'C&opy Record'
      OnClick = B_LCopyClick
    end
    object Undo1: TMenuItem
      Caption = '&Undo Changes'
      OnClick = L_UndoClick
    end
    object Delete1: TMenuItem
      Caption = '&Delete Record'
      OnClick = B_LDeleteClick
    end
    object Print1: TMenuItem
      Caption = 'P&rint Record'
      OnClick = B_LPrintClick
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object Help2: TMenuItem
      Caption = '&Help'
      OnClick = Help2Click
    end
  end
  object PopupMenu2: TPopupMenu
    OnPopup = PopupMenu2Popup
    Left = 416
    Top = 424
    object RightRecord1: TMenuItem
      Caption = 'Right Record :'
      Enabled = False
    end
    object GoTo2: TMenuItem
      Caption = '&Go To Web Page'
      OnClick = B_RGoClick
    end
    object Capture2: TMenuItem
      Caption = 'Capture &Web Page'
      OnClick = B_RCaptureClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object ViewBuffer2: TMenuItem
      Caption = '&View Copy Buffer'
      object TMenuItem
      end
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Paste2: TMenuItem
      Caption = '&Paste Record'
      OnClick = B_RPasteClick
    end
    object Copy2: TMenuItem
      Caption = 'C&opy Record'
      OnClick = B_RCopyClick
    end
    object Undo2: TMenuItem
      Caption = '&Undo Changes'
      OnClick = B_RUndoClick
    end
    object Delete2: TMenuItem
      Caption = '&Delete Record'
      OnClick = B_RDeleteClick
    end
    object Print2: TMenuItem
      Caption = 'P&rint Record'
      OnClick = B_RPrintClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object Help3: TMenuItem
      Caption = '&Help'
      OnClick = Help2Click
    end
  end
end